perm filename INPUT.FIX[1,JRA] blob sn#005894 filedate 1972-10-19 generic text, type T, neo UTF8

(DEFPROP <INPUT> 
 (LAMBDA NIL
  (NLRR (QUOTE INPUT)
	(FUNCTION (LAMBDA NIL (COND ((AND (<ID>) (CH :)) (STK 1)) ((AND (<S>)) (STK 0)) (*NIL*)))))) 
EXPR)